home *** CD-ROM | disk | FTP | other *** search
- .include "global.s"
-
- .area _CODE
-
- ;; Copy memory zone to HIRAM
- ;;
- ;; Entry conditions
- ;; C = destination
- ;; B = length
- ;; HL = source
- ;;
- ;; Register used: AF, BC, HL
- .hiramcpy::
- 1$:
- LD A,(HL+)
- LDH (C),A
- INC C
- DEC B
- JR NZ,1$
- RET
-
- _hiramcpy::
- PUSH BC
-
- LDA HL,4(SP) ; Skip return address and registers
- LD C,(HL) ; C = dst
- LDA HL,7(SP)
- LD B,(HL) ; B = n
- DEC HL
- LD A,(HL-) ; HL = src
- LD L,(HL)
- LD H,A
- CALL .hiramcpy
-
- POP BC
- RET
-